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LOCTR OBJECT TEXT STMT SOURCE STATEMENT COPYRIGHT IBM CORP 1976 LOCTR OBJECT TEXT STMT SOURCE STATEMENT COPYRIGHT IBM CORP 1976 
001D70 3 O38F4 START X'1D70! QOO1EOQC 0Q0CO 119 DC X*00CO! 
Yo IO III IO III IC i Ro a oR Fa IK I a kk kk OO1TEOE 1E14 120 CTW40O DC A (CTW4 1) 
5 * * 001E10 FFFF 121 DC A(-1 
6 * CK PREREQUISITES KK * 122 * OUTPUT MESSAGE 
7 * *x 001E12 3823 123 DC X'38238 
8 * NONE * QO01E14 C9DSE5C1ID3CIC4HYHOC 124 CTW41 DC C'INVALID ENTRY' 
Q x * 001E21 00 125 DC x'0OO0o! 
NOME TT CCSOSCL SSS SS SLOSS CSCS SSS CCS S SSCS SS SSCS LSC SS LS SSS SSS STL STS LSS Le LL Le 2 126 * 
13: 124 * SOEUR oBEOCE oumPoR 
* eK MODIFICATIONS 3 * 
13 * x Q01E22 0080 129 DC X'00808 
14 * NONE * 001E24 1E2A 130 CNMO5 DC A (CNMO6) 
15 * x O001F26 FFFF 131 DC A a) 
16 ee Re ee a he ke ae 2 he a eo te 2h 2c he ae 2 2 fe fk oe ake ae ae ie fe ae of ae oe ae af ae ae oie ae ak aie ae aie oie fe atic a ate ae ae oe ake ae at ate ofc oe fic a ac fe afk fc af ac ac ae ok a ak af 132 * OUTPUT MESSAGE 
fee : SOT Se 2B eS psc9C3c540CIC 133 CNMO6 De TBST icE ADDRESS ' 
18 * eK REA'S INCORPORATED KK * = 
19 * t * OO01E3B 404040404040 135 CNMO7 DC ct , 
20 * NONE * OO1TE41 4040 136 DC cf 
21 * * 001E43 C4C5ES5CIC3C540CIC 137 DC C'DEVICE ID = ! 
2 CIC ICI IORI IO RI IG ok IIR I ROR IOI I RII OR I II RR I I ak Kk OO1E4F 40404040 138 CNMO8 DC Cc! ' 
23 * * 001E53 00 139 DC x*'oot 
ou * ok SPFCIAL INSTRUCTIONS KK * 140 * HTOE HEX TO EBCDIC CONTROL BLOCK ID FROM READ ID 
25 * *x 001E54 0002 141 CNM15 DC X'0002' HEX DATA 2 BYTES 
26 * NONE x 001E56 253A 142 DC A(CTIID DATA ADDRESS ID FROM READ ID 
27 * * 001E58 1E4F 143 DC A (CNMO8 EBCDIC OUT BUFFER 
PIS LSS SSS SCSS SSS SSO CSCSSCSSSCS SESS SSL SCCSCCS SSS SSCS LSS CS SS STO S TS LSS TSS SL eT Ss 144 * CONTROL BLOCK HTOE 
29 * * OO1E5A 0002 145 CNM20 DC X'0002! HEX DATA 2 BYTES 
30 * KK E. C. HISTORY A oe a * OO1E5C 23D4 146 DC a (EH ROT) DATA ADDRESS 
31 * * QOO1E5E 1E3B 147 DC A (CNMO7 EBCDIC OUT BUFFER - DEVICE ADDRESS 
32 * DATE 12APR78 DATE OS8AUG78 DATE DATE * 148 * 
33 * E.C. 755404D E.C. 755404 E.«Cs Ee Gy * 149 * CONTROL BLOCK OUTPUT 
34 * * 150 ALIGN WORD 
35 eK RR ORO RII IIR OR OR IK ok ok ii ok kok kako ak QO01E60 0080 151 DC x'*0080! 
37 RI OIRO a IO OK IOI ICI OO CCI IO I Fok iio dk kok kak fk ok OO1E62 2426 152 CNM10 DC A (CTEO1) 
38 * OVERLAY PROGRAM START OO1E64 FFFF 153 DC A aol 
QQ i HR te eK oo to KO ROK kK kk kk kk ok ke kk ke ie tak ke fee ateae ake te ate ate ake ae ake ate ae a ok ake 154 * OUTPUT MESSAGE SEE CTEO1 
001D70 6F0D 238E 40 CYROO MVW R7,OLYRA SAVE OVERLAY RETURN ADDRESS 155.4 
001D74 6802 2000 4 B CNEOO START OVERLAY 156 * CONTROL BLOCK OUTPUT 
UD RR RR RO IO RO a kk a ke kk ak ke i aie kk eke aie ie ok ke ake akc ok akc ok 157 ALIGN WORD 
QQ 4 OR OR IK A ok loki doko goto ok tok kok tio ik tak ak 001E66 00CO 158 DC Xx'O0CO! 
45 * DATA FOR CONFIG TABLE CHECK OVERLAY OO1E68 1E6E 159 CND4O DC A (CMD41) 
U6 ORR ROC I IO ikgkokokckok dick ttc ak ak tekok tei cite teat a ofc aie ak akc OO1E6A FFFF 160 DC A (-1) 
001D78 1830 47 IPLSL DC X'1830° @ IPL PASS SWITCH IN BASIC (IPLPS) 161 * OUTPUT 
OO1ID7A 1838 48 BOPTL DC X'1838% ®@ OPTION TABLE IN BASIC QOO01E6C 3849 162 DC X'3849! 
U9 3 RR rok ak dak kak kak aka ik ak ea kk ae tea ake akc a ofc ak ac QOO1E6E C1D3E340C3D6D5E2D 163 CMD41 DC CtALT CONSOLE ERROR'® 
001D7C 00 50 CTSF1 DC xX*'OO't ENTRY # FOUND IN 1ST SEARCH BYTE1 OO1E7F 00 164 DC X'00! 
0O01D7D 00 51 CTSF2 DC xX'OO! ENTRY # FOUND IN 1ST SEARCH BYTE2 165 * 
OO1D7E 00 52 CTSEM DC X*00! ENTRY # FOUND 1ST PASS 166 * CONTROL BLOCK OUTPUT 
001D7F 00 53 TCSBP DC X'QO! BYPASS TCS ERRORS FLAG 167 ALIGN WORD 
001D80 00 54 ERDET DC X'OO! ERRORS DETECTED FLAG 001E80 0080 168 DC X'0080! 
001D81 00 55 ALIGN WORD 0OO01E82 1£E88 169 CMD50 DC A(CMD51) 
Q001D82 00 56 CHACA DC X'0O0! DEVICE ADDRESS FOR R3 OO1TE84 FFFF 170 DC ~ 
001D83 00 57 CHACB DC X'O0O! CONFIG TABLE ENTRY FOR R3 | 171 * OUTPUT 
58 3k oR a oo rm ok a ak klk kodak ai ke kf te sake cok OO1E86 384C 172 DC X'384Ct 
59 x CONFIG TABLE MESSAGES = 3820 -38UF 001E88 FOF27EE6D9C9E3C54 173 CMD51 DC C*Q2=WRITE DISKETTE! 
60 * O01E99 00 174 DC Xx'0O! 
61 * CONTROL BLOCK OUTPUT 175 * 
62 ALIGN WORD 176 * CONTROL BLOCK OUTPUT 
001D84 0080 63 C X'0080! 177 ALIGN WORD 
001D86 1D8C 64 CTW20 DC A (CTW21) QO1E9A 0O0CO 178 DC X'O00CO! 
001D88 FFFF 65 C ee OO01E9C 1EA2 179 CNM60 DC A (CNM61) 
66 * OUTPUT MESSAGE OO1E9E FFFF 180 DC A(- 
O0O01D8A 384C 67 DC x'384c! 181 * OUTPUT 
001D8C C3D6D5C6C9CT4OCS5D 68 CTW21 DC C'CONFIG ERROR! OO1EAQ 3840 182 DC X'*3840! 
001D98 00 69 pc x'oo? OO1EA2 cC5SDIDIDEDIEOCID5S4 183 CNM61 DC C'ERROR-IN HARDWARE NOT IN TABLE! 
70 * OO1ECO 00 184 DC X'00! 
71 * CONTROL BLOCK OUTPUT 185 * 
001D99 00 72 ALIGN WORD 186 * CONTROL BLOCK OUTPUT 
OO1D9A 0080 73 pc x*oo8o! O0O1ECI 00 187 ALIGN WORD 
001D9C 1DA2 74 CTW22 DC A (CTW23) QO1EC2 00C0 188 DC X'O0OCO! 
QOO1D9E FFFF 15 DC A Bee O0O01EC4 1ECA 189 CNM65 DC A (CNM66) 
716 * OUTPUT MESSAGE OO1EC6 FFFF 190 DC A (-1) 
OO01DAQ0 384C 77 DC X'*384C! 191 * OUTPUT 
OO1DA2 FOFT7EE3C5SD9D4CID 78 CTW23 DC C'O1=TERMINATE® OO1EC8 3841 192 DC Xx'3841°% 
OO1IDAE OO 719 DC X'oo! OO1ECA C5SDIDIDEDI6OCIDSY 193 CNM66 DC C'ERROR-IN TABLE NOT IN HARDWARE! 
80 * OO1EE8 00 194 DC x'0o0o! 
81 * CONTROL BLOCK OUTPUT 195 * 
OOIDAF 00 82 ALIGN WORD 196 * CONTROL BLOCK OUTPUT 
0O01DBO 0080 83 DC X'O0080' OO1TEE9 00 197 ALIGN WORD 
Q0O01DB2 1DB8 84 CTW24 DC A (CTW25) OO1EEA 0O0CO 198 DC X'OOCO! 
OO1DB4 FFFF 85 DC A pel OO1EEC 1EF2 199 CNM6A DC A (CNM6B) 
86 * OUTPUT MESSAGE OO1EEE FFFF 200 DC A (-1) 
QQO1DB6 384C 87 Cc x'38u4ct 201 * OUTPUT 
001DB8 FOF27ED7TD9C9OD5SE34 88 CTW25 DC C*Q2=PRINT ALL ERRORS! OO1TEFO 3842 202 DC X*'3842! 
O0O01DCB 00 89 DC x'oo? OO1EF2 C5SDIDIDEDIBUCICHY 203 CNM6B DC C'ERROR-ID MISMATCH® 
90 * 001F03 00 204 DC x'oo? 
91 * CONTROL BLOCK OUTPUT 205 * 
92 ALIGN WORD 206 * CONTROL BLOCK OUTPUT 
0O0TDCC 0080 93 DC Xx'0080' 207 ALIGN WORD 
QOO1DCE 1DD4 94 CTW26 DC A (CTW27) 0O01FO4 0QCO 208 DC Xx'QOCcO! 
O001DDO0 FFFF 95 DC A eee 001F06 1FOC 209 CNM80O DC A (CNM81) 
96 * OUTPUT MESSAGE OO1FO8 FFFF 210 DC A (-1 
OO1DD2 384C 97 DC X'384C! 211 * OU T 
QOO1DD4 FOF37ED7D9C9OD5E34 98 CTW27 DC C'Q3=PRINT OPTIONS! OO1FOA 212 DC X'3843! 
OO1DE4 00 99 DC X'00! OO1TFOC C5DIDIDEDIEB0CHCH5E 213 CNM81 DC C*tERROR-DEVICE TYPE VS READ ID! 
100 * 001F28 214 DC x*oOo? 
101 * CONTROL BLOCK OUTIN 215 * 
OO1DE5 00 102 ALIGN WORD 216 * CONTROL BLOCK HTOE 
001DE6 0080 103 DC X'O0080! 001F29 00 217 ALIGN WORD 
OO1DE8 I1DF2 104 CTW30 DC A(CTW31 OUTPUT OO1F2A 0002 218 CNM85 DC X'0002! HEX DATA 2 BYTES 
OO1DEA 1EOA 105 DC A (CTW32 INPUT QOO01F2C 0000 219 CNM86 DC A (0 DATA ADDRESS 
OO01DEC 0001 106 DC A (1 LENGTH OF INPUT OO1F2E 1F57 220 DC A (CNM92) EBCDIC OUTPUT BUFFER - DCP STOR SIZE 
OO1DEE 0001 107 DC A(1 CONVERT TO HEX 221 * CONTROL BLOCK HTOE 
108 * OUTPUT 222 ALIGN WORD 
QO1DFO 3822 109 DC X'3822' OUTPUT 001F30 0002 223 CNM87 DC X¥' 0002" HEX DATA 2 BYTES 
OO1DF2 FOF4YTEC2ZE8D7TCIE2E 110 CTW31 DC C'OY=BYPASS TCS ERROR(S) ! 001F32 0000 224 CNM88 DC DATA ADDRESS 
QOO01EO8 QO 111 DC Xx'00! OO1F34 1F62 225 DC A (CNM93) EBCDIC OUTPUT BUFFER - TABLE STOR SIZE 
0O01E09 00 112 ALIGN WORD 226 * CONTROL BLOCK OUTPUT 
113 * INPUT 227 ALIGN WORD 
OO1TEOA 00 114 CTW32 DC X'00! INPUT 0OO01F36 00C0 228 DC X'O00CO! 
OO1TEOB 00 115 DC X'o0o?t OO1F38 I1F3E 229 CNMI9O DC A (CNM91) 
116 * OO1F3A FFFF 230 DC -1 
117 * CONTROL BLOCK OUTPUT 231 * OUTPUT 
118 ALIGN WORD OO01F3C 384E 232 DC X'*384E! 
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LOCTR OBJECT TEXT STMT SOURCE STATEMENT COPYRIGHT IBM CORP 1976 LOCTR OBJECT TEXT STMT SOURCE STATEMENT COPYRIGHT IBM CORP 1976 
OO0O1F3E CS5SD9IDIDEDI60E2ZE3D 233 CNM91 DC C'BRROR-STORAGE SIZE - DCP=! 
O01F57 40404040 334 CNN92 DC OC! o50e6 Sion 138 324 BVA CHMSO,R7 
QOOIF5B 4YOE3CIC2D3C57E 235 DC C' TABLE=' 00206A 6000 352 svc our ” PRINT "CONFIG ERROR STORAGE SIZE! 
0O01F62 40404040 236 CNM93 DC Cc! ' PSSST SL SLSS SSS SSCS CLS SS CS ST SSS SSS SSS SSS PLS SS SSP TSS eS TPCT TS eter est fy 
Satie 353 
OO1F66 00 ee @ DC X'00 334 : DO FOR EVERY ADDRESS 
bait, <a 239 + ae BLOCK HTOE © DEVICE ADDRESS 326 * BEARCH CONFIG TABLE FOR DEVICE 
357 Seectasp rT GCctC ne gee er ee ge re 
aoe. Sone sii CNMD1 De : eae Bex DRESS tHEx 00206C 4020 23D4 0000 328 CNEOS MVWI ckFOR : 0 ADDRESS 
OO1F6C 1F99 243 DC A (CNMD6 EBCDIC OUTPUT BUFFER 002072 6F03 299A 360 CNEO6 BAL CPT RT 2 Seen ere 
244 * CONTROL BLOCK HTOE 1ST ENTRY # 361 * 
eegeee O08 ae enn ean gone ae wed “4 ees 002076 8028 2305 2537 362 MVB CHAC2,CTIDA DEVICE ADDRESS FOR READ ID 
OO1F70 1D7D 247 DC A chse2} DATA ADDRESS AS xy: Ceuiee. En ae aea * at CEEt pat ee eee IN CTIID 
OO1F72 1FA2 eae ; Loe ae BLOCK a eee Poe BUFFER - TABLE STOR SIZE 002080 402F 23D0 0000 365 CWI 0,CCERR CK CONDITION CODE ERROR FLAG 
250 KLIGN W WOR melee aca rao ae eee 386 x SEROR CHEOT TON CODE NOT 0 OR 7 
QRIETE 9901 33} coma BE Nahas ear seston wemacene 368 + READID PRINTS 05 OWH ERROR MEOSAGES 
Q0O01F78 #£=1FAT7 253 DC A 58 EBCDIC OUTPUT ee 00208C 6801 21EA 370 H PASS 1,R 
254 * CONTROL ELoek OUTPUT : E BENZ. CREO pent gee baenoe 
220 conaror et 002090 C725 1D80 371 MVBZ ERDET,R7 SET ERRORS DETECED FLAG TO 0 
ApietE boed $2? - An eats 002094 6802 2238 332 ? B CNE31 B TO CONTINUE WITH NEXT ADDRESS 
ee ace £2) CNMD4 De Me 002098 6C08 253A 374 CNEO7 MVW CTIID,R4 RY = DEVICE ID FOR STOPS 
ae Pe angi ) 00209C 8828 23D4 23BC 375 MVW CHACT, CTSA DEVICE ADDRESS FOR TABLE SEARCH 
O01F80 384F 260 C X'384F BO20AG EFOD 23cC 379 NVN  RACCBPAS FLAG BYPASS A3 OEMIA IN CSRCH SET 
J 
Races TT ci a ae oon Cube De C1 BRROR- DUPLICATE ADDRESS' OO20AA 6FOD 23CE 378 MVW R7,CBPAY FLAG BYPASS A&W KITE IN CSRCH SET 
DOLORES BOCCRERI OREO ae De Sl BeaRy 4 OO20AE 6FOD 23C2 379 MVW  R7,CTSEN ENTRY # TO START SEARCH AT 
Deca. Tone Sen caNDe ne Bi 0020B2 6F03 24C0 380 : BAL CSRCH,R7 CALL SEARCH cathe 
OO1FA4 405040 265 Dc Cc’ && DOUBLE & TO PRINT ONE 0020B6 CF25 23CC 382 W C 7 ARCH RESULT IN SEF & CISEA 
OO1FAT 4040 266 CNMD8 DC Oct VG =CBPARSE FLAG RESET 
Potten iGo ees D re OO20BA CF25 23CE 383 MVWZ CBPA4G,RT7 FLAG RESET 
re 268 * sae ‘i OO20BE 8828 23C0 1D82 384 MVW  CTSEF,CHACA CONFIG TABLE ENTRY = BYTE 2 
ee CauubOL BEGO OUaRUs 0020C4 8028 23D5 1D82 385 MVB CHAC2,CHACA DEVICE ADDRESS = BYTE 1 
288 ON TROT ak OO20CA 6B08 1182 386 MVW  CHACA,R3 R3=DEVICE ADDRESS-CONFIG ENTRYY-STOPS 
HOARE. GOR6 270 ve yore as 0O20CE 6E08 23C0 387 MVW CTSEF,R6 
OO1FAC 1FB2 272 CNMAO DC A (CNMA1) MESSAGE ADDRESS ete0ne. “eee ete ae3 * Ene. NEN eres NOT IN TABLE Pen 
OO1FAE FFFF oie ‘ De A (-1) IMMEDIATE RETURN 0020D6 6D08 253A 390 : MVW CTIID,RS 
OOIFES BIDSDEC3CSE2E2D6D 376 CNMA1 DE —«C' PROCESSOR TYPE ERROR! 392 3 DEVICE NOT IN HARDRARE OR TABLE - OK 
BU IEOe. 00 Z50 ae ions 0020DA 6800 2238 593 BZ CNE31 B TO CONTINUE SEARCH 
a ee 394 * DEVICE IN HARDWARE NOT IN TABLE ERROR 
aes Bains: ae ae cumpam 0OO20DE 6F08 23C8 395 MVW BASSI, R7 
Raney dag a SSE ae 0020E2 6801 21EFA 396 BNZ  CNE30° J IF IPL PASS 
AeteeR: SRaes oe4 te ae 0020E6 C725 1D80 397 MVBZ ERDET,R7 SET ERRORS DETECED FLAG TO 0 
men ota oh eRAOE: De R (CRAOS) OO20FA 4724 1E9C 398 MVA CNH60, R7 
Bodo en: sneer 284 ue ats 4) 0020EE 6000 399 SVC UT PRINT ERROR 
ee OT OR OO20FO 4724 1E5A 400 MVA CNH20, R7 
OO1FCE 3822 285 DCX" 382a8 OO20F6 4724 1E54 102 AVA anes, RT 
Te EAC ron Peo suCee, =< 2ee Cann2. Ue CAG oe ence OO20FA 601A 403 SVC HTO CALL HEX TO EBCDIC CONVERSION 
268 * 003100 6000 |. 405 sve CHHOS oe PRINT DEVICE ADDRESS AND ID 
283 - Sele uonn OUTPUT 002102 6802 2238 406 B CNE31 J TO CONTINUE SEARCH 
SOieER. 086 335 aE ene 407 * DEVICE IN TABLE, CK FOR DEVICE IN HAR 
RO4oLe: -4eeS Car Omit A (CNHA3) 002106 6D08 253A 408 CNE10 MVW CTIID,RS5 
Baie ees eee £32 te wea 00210A 6801 2148 409 BNZ  CNE20 B IF DEVICE IN HARDWARE 
aR x aaeeuT 410 * DEVICE IN TABLE, NOT IN HARD - ERROR 
QO1FFO 3838 295 DC -X13838! 03415 BeBe ee) ONE CNESOT J 
OO1FF2 DIDTDBYODEDS4OEZE 296 CNMA3 DC Ct RPO ON SYSTEM! 002114 720 1D7 413 IF IPL PASS 
OO1FFF 00 297 DC 100 ee Oe eneie 
ae 002118 1005 oe " JZ CNE15 J IF NOT BYPASS ICS ERRORS 
He He He ae A Yo she ae fe he fe Be A ae Ie IAC he he He a ae I eK Kk hc he hc he ah he ofc he ah he ae hc eh he ae he ae he he ae ae he ae he ae fe ofc ae ae afc ae ae ae oie ae ae ae ae ae ok ae ie 
aa FIG CR GIG O GCG ICICI GIGI IGG GIGI I IG IOI a Fok gk O0211A 6F08 23BE 416 MVW Cao Oke ADDRESS OF TABLE ENTRY 
302 * END OF CDATA 003126 hoo 2238 ree BON bh 254 ) y BYPASS ERROR TF eS ENTRY 
ann PP ee ene et eRe re eye gt et regs | ear oper one 002124 C725 1D80 419 CNE15 MVBZ ERDET,R7 SET ERRORS DETECED FLAG TO 0 
BOG Hm HR He ee Re he ee aK oe eK a ae he hee a ee ee ek a i ie ee i i a eee a ee a ie ok ote oh aG 1EC4 Hoe Sue ae a PRINT R 
307 * BEGIN OVERLAY 00212E 4724 2418 422 MVA CNM25,R7 ee 
308 Pee LSS SSS SSS SS SLE SE SSS ESS LS SSS SS LS SPSS STS SSS SSS SS SS SS SS 2 2 2S St 002132 601A 423 SVC HTOE 4 
313 a tee TET LOAD AT IPL TIME SWITCH THE SAME AS IN BASIC. 002134 8828 23BE 2420 424 MVW  CTSEA,CTH21 TABLE ENTRY START ADDRESS 
312 AAO AIC IGG RG IOI IG GIG RGR aC AGIOR A tok sok dak ick OR Stae ra 241E ice ve Ceneo ent HTOE CONTROL BLOCK ADDRESS 
002000 8838 1D78 23C6 313 CNEOO MVW Aoopee IPLPS SET IPLPS AS IN BASIC 002140 4724 1E62 427 MVA CNH10,-R7 
002006 4020 23c8 0001 314 MVWI PASS SET 15ST PASS FLAG 002144 6000 u28 SVC ur” PRINT CONFIG TABLE ENTRY 
315 ck iah OX EEE AL Henn d SE AAEEEEEAE EET EH RENE EEEE EES CARE REEROAT OSES EROS 002146 5078 439 ‘i CNE31 J TO CONTINUE SEARCH 
316 * CHECK FOR SENSOR I/O DEVICES ON SYSTEM “30 * DEVICE IN TABLE AND HARDWARE 
317 Oe ee ee er eee er Sarna 431 * COMPARE DEVICE ID'S 
00200C 6F03 22F6 318 CKSIO BAL, CSIO 002148 6A08 23BE 432 CNE20 MVW CTSEA,R2 
319 Oe reed op POE Oe eee TS ie Te Tee err rr eet 00214c 88AB 253A OOOE 433 GW CTITD, (R2 CUDRI) COMPARE ID'S 
320 * CHECK SYSTEM TYPE 002152 6800 2192 434 BE CNE25’ : B IF ID'S SAME - 0 
B21 He Xe he ok he He ee ee he he Ke ae he ee Re a ae ae he ee ee he he he ee 2 AC a a a ec ee I ee ee ok OK ee u35 * cae ID'S NOT THE SAME K 
002010 8028 23A6 1D80 322 CNEO1 MVB  CTCO1,ERDET RESET ERRORS DETECTED SWITCH 002156 6F08 23C8 436 MVW PASS1.R7 
002016 6F03 2980 323 BAL STYPE, R7 DIAGNOSE SYSTEM TYPE 00215A 1847 437 INZ CNE30’ J IF IPL PASS 
00201A 7164 324 MVW R3 = SYSTEM TYPE FOUND 00215c C725 1D80 438 MVBZ ERDET,R7 SET ERRORS DETECED FLAG TO 0 
00201C C430 23F4 395 HVB CURBS, Ru RG = SYSTEM TYPE IN CONFIG TABLE SOoted. Gaon aoe 439 ya CCUMER DT - . 
002020 7385 326 CW COMPARE 002164 6000 440 svc our ” PRINT ERROR 
002024 6F08 23C8 328 MVW Passi, R7 00216A 601A nate) SVC TOR ’ 
002028 6801 21EA 329 BNZ CNE30° J IF IPL PASS 00216C 4724 1E54 uu3 MVA CNM15,R7 
00202C C725 1D80 330 MVBZ ERDET,R7 SET ERRORS DETECED FLAG TO 0 002170 601K near SVC TOR’ 
002030 4724 IFAC 334 MVA CNMAO,R7 002172 4724 1E2u wus MVA CNMOS,.R7 
002034 6000 332 SVC OUT PRINT '* PROCESSOR TYPE ERROR! 002176 6000 uuU6 SVC OUT . PRINT DEVICE ADDRESS & ID 
333 tee et SSeS SSS SL SL SSS SSE SSLS SES SSS SSS SSS SPSS SS LS SSS SSS FES SSS St SS SS 5S 002178 4724 2418 ua7 MVA CNM2S.R7 
334 * CHECK STORAGE SIZE 00217C 601A LU SVC TOF . 
335 Re ee Tee eee Ret nye re nw eee tie Tr are Pe eg ee 00217E 8828 23BE 2420 44g MVW CTSEA-CTM21 
002036 336 CNEO3 EQU 002184 4724 241E 450 MVA CTM20-R7 
002036 8828 2390 1F2C 337 new CTNSZ, CNM86 DCP STOR SIZE ADD IN HTOE 002188 601A u54 SVC HTOE : 
00203C 8828 23F6 1F32 338 av CTABS .CNM88 TABLE STOR SIZE ADD IN HTOE 00218A 4724 1862 452 SVR CHM10.87 
00204C 100F ee Z Sennaee tae ee ee oe 002192 6 E08 253A 456 CNE25 MVW CTIID,R6 READ DEVICE ID RESUL 
00204R 6F08 23C8 344 CNEO4 MVW PASS1,R7 065198 8205 2876 “eB obi eee geo ae & 
002052 6801 21EA 345 BNZ_  CNE30 J_IF IPL Pass 00519C 6A08 D3BE 139 HVW «© CRSEARD TSHR = ENTRY ADDRESS 
002056 C725 1D80 346 MVBZ ERDET,R7 SET ERRORS DETECED FLAG TO 0 0021A0 C6A4 0001 460 CB (R2,1) ,R6 COMPARE DEVICE TYPES 
00205A 4724 1F2A 347 MVA  CNM85,R7 h4/" 
onoGeE: Bote aia eve ran 0021A4 1049 461 JE CNE31 LOOK AT NEXT ENTRY 
NOSOER: bTOR ASG ants aye. “CHMGT ORT 0021A6 7E06 0000 462 CWI 0,R6 0 = CDEVT NO FIND 
’ OO21AA 1046 463 JE CNE31 LOOK AT NEXT ENTRY 
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% x + * 

# Ly.) rs] fj H + 8H * .o) > 3 + be + 
# HU Few fe} +t * H ey fs e +0 
& FL? Fay HY o) mM % 22 % fo] fe, a Ss) He %#% * 
% tz be ee % HH * 3 z - H% +H * 
% moO] ro) z= £ %* %+ * mM fo) mo o oe) = % +H 
+ aU e HH Oo % RE % a iS) Om A eq v3 x %+% 
% =) e 4 + * e 2] cm a] * %++% * 
*eW Diba * UW an % + e ew moe 79) 79 % +H 
WwW mmm a HA WM Pp * 2% %& HW = mam Bi fl ca > x 2% %* 
*#M Hee om ym Hse = VU % #% O *f oH Bes pb H un x HH 
% zz =< & @ap o e 2H OH % zN Mp be ony % £€H & 
+ Awe UO & HO 8 * %+%F D> %* AUN) car oOo ao H = + HH 
*¥#Q = 2a WM * 2% *A AN Zz ro) % +28 
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SOURCE STATEMENT 


* 
CAD10 ane 


* 
CAD20 MVWI 
CAD30 B 

KK he A 2 KK ke ok 
* END OF 


P/N=8327421 EC=755404 PAGE 08 
COPYRIGHT IBM CORP 1976 
CAD10 
CDre4, R6 PRINTER 
CAD10° 
CDT68, R6 4973 PRINTER 
CAD20° B IF NOT VALID TYPE 
VALID ADD VS TYPE 
1,R6 
chp30 
INVALID ADD VS TYPE 
CAERA* 


RETURN 
SRR I FOR ROR RIOR IIR I IR i tok ok 
CADTY PROCEDURE 


He He He AK he ee he Oe a he I MK ae KK MK KK Ke a ee ke ee ee oie oe eK OK ee fe he Oe ie ee ok KK OK Ok Ke eK Kk kk 
PSST SS SS SSS SS PSL SSS STS SPP SS SLL SSL SS EPS SSL ES SS SeL SES SS SSL SSS SESS Et SS SS SS. 5 S. 5's 3 
* PROCEDURE STYPE 
* FIND SYSTEM TYPE 
* DIAG X'O4" INSTRUCTION RETURNS RO = X'0002* FOR BELLE 4952 
x X¥'0003" FOR ELBERTA 4953 
* X¥'0005' FOR CLING 4955 
x RETURN R1=22 FOR BELLE 4952 
* R1=23 FOR ELBERTA 4953 
* R1=25 FOR CLING 4955 
x RETURN TO NEXT INSTRUCTION 
He HK he Be he He Ye He de HK 3 fe he hc Ie fe I ke ae He He he fe she ae he He he He ee ae He he He cae fe ah ke ae he he ae he hc he se he le ae ae hee af ae oe a he he he he He 2 2 aK Ke ok ae ok ok 
STYPE DIAG xX'O4t DIAGNOSE SYSTEM TYPE 
CBI X'02',RO 
JE STYPS 
CBI xX'03*,R0 
JE STYP7 
* 4955 = 10005! 
MVBI x#251, 
I STYP9 
* 4952 = *'0002! 
STYP5 MVBI X'22',R 
J STYP9 
* 4953 = '0003' 
STYP7 MVBI X'23", 
STYP9 (R7) RETURN TO CALLER 
KEE KKK BND OF SYSTEM TYPE PROCEDURE 33230 ICRA fo RIOR RO dK 
* 
* 
ok 
Me He He He He He He ae ae 2 de fe HK 3 fc he He he he He He he oe he He he ae ae ae he he 3h He ie Ke he ie he 2 kk 2k ak ae fe ae hc ae fe he oe ee He oe ee he fc fe oe i ae ie fe ae ok 
* PROCEDURE CDCPT 
* CHECK FOR DCP TERMINATE BIT ON -— BIT O OPTION WORD 1 
PS SSS SSS SSL PSS SSL SSS LP SESS ESS SESS SSE SS SSS SE PSS ESSE SSS PS SSPE SLE ES SF SSS SSF. 
CDCPR DC X'0000' RETURN ADDRESS 
coe aaa coca ee eae ace 
CDCPT MVW CDCPR SAVE RETURN ADDRESS 
MVW OPTI, R7 @ OF OPTION WORD 1 IN BASIC 
TBT BIT 0 = DCP TERMINATE PROGRAM 
‘ IZ Ree GO 
. SVC ‘TERM TERMINATE PROGRAM 
CDCPU B CDCPR* 


RETURN 
He 2 He ee ee 2 2 2 fe ec 2 ae 2 Ae ae ie he 2 ke i EH ae a a i a 2 ea ae ic i aie i ae ea a fc ic a 2c coe ce i eae oc cK Kk 
* END CHECK FOR DCP TERMINATE 
HR He He He He He ee a Ae te He He He ee he He He He He ee ee He He ie i He eee Re ee i he He ee Ae he HK 2 he ee ee ok OK 
HM He A He A He He ee Hee He He He A he Ae eH 2 EK a AK ee ec ee aK He He HK i eK KK KK 


* PROCEDURE WANDT 
- PURPOSE - SRpucHRee TABLE TO DISK AND TERMINATE. 
2 a IG IG IR gO i a iio dak iti dc ieaoiok tetete ak ae ak ak tok ik 
WANDT MVA CTRL5,R7 

SVC WRITI WRITE DISK 
CTERM SVC MINATE PROGRAM 


TERM TER 
HE He He ee Ae 2 ek ae ee eH He He He He ae ee 2 ee a 2 he a 2 ee Oe he ee ee He i i ee He He ee He te He He Hee ee eK 
He ee A He A He he He He ee ee He a a Re 2 i a ee ee He ee HK a HC HK I HK KE KK KK KK KK 


7 END OF 


COMMON SUBROUTINES 


He He Ae A 2 He a eC a fe ee ee he He He ee He he ee He he Ke ei He a ee fe he i ee Re i he he he ee ee ae a i ee a eK Ik Ae 
He A He He he HE HH ee He ee He i He HE a He He he eK eH I KK KKK KE KKK KKK 


ND OF PROGRAM 


END CYROO E 
RR OOO IR I ea IR RIOR I OR AR a eka ka teak kk kk kek a ek 


* END OF CONFIGURATION PROGRAM 
SOR OR OR IRR AOR OR I IG a IO a ko a a Er 


O38F4 - CONFIGURATION TABLE CHECK 


DECLARED 
953 
955 
282 
286 

1593 
1579 
1589 
1611 
1634 
1637 
1639 
992 
993 
1608 
994 
995 
1008 
1009 
1010 
1677 
1679 
1686 
1510 
966 
967 
968 
969 
970 
971 
972 
973 
959 
961 
962 
963 
964 
965 
1504 
1505 
1017 
56 
1013 


1014 
1007 
6 28 
643 
646 
1098 
1104 
1108 
1109 
1115 
1119 
1125 
1129 


NAME 
ALTER 
AOPTN1 
CAAO4 
CAAO5 
CACRA 
CACO5 
CAC 10 
CADTY 
CAD10 
CAD20 
CAD30 
CA EAD 
CAEAE 
CAERA 
CAETY 
CAETZ 
CBPA3 
CBPA4 
CCERR 
CDCPR 
CDCPT 
CDCPU 
CDEVT 
CDTAO 
CDTA3 
CDTAY 
CDTA8 
CDTAY 
CDTBO 
CDTBY 
CDTEO 
CDT3D 
CDT40 
CDT44 
CDT45 
CDT64 
CDT68 
CDVRA 
CDVR1 
CDVT1 
CHACA 
CHACT 


CHAC2 
CINCF 
CKRP1 
CKRP3 
CKRP5 
CMD20 
CMD21 
CMD22 
CMD23 
CMD25 
CMD26 
CMD30 
CMD31 


ATTRIBUTES AND 


ADDRESS. HEX 
1590 
ADDRESS. HEX 
1680 
ADDRESS. HEX 


ADDRESS. HEX 
1635 
ADDRESS. HEX 
612 
ADDRESS. HEX 
579 


ADDRESS. HEX 
1611 1639 
ae HEX 


ADDRESS. HEX 
1580 


ADDRESS. HEX 
377 382 
ADDRESS. HEX 

78 383 
ADDRESS. HEX 
365 1252 1 
ADDRESS. HEX 

1679 


aA 


—_ 


RESS. HEX 
ESS. HEX 
RESS. HEX 
RESS. HEX 
RESS. HEX 
RESS. HEX 
RESS- HEX 
RESS. HEX 
RESS. HEX 
RESS. HEX 
RESS. HEX 
E HEX 
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ty 
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HEX 


ie) 
On 
nN 


RESS. 
ESS. HEX 
ESS. HEX 
634 
ESS. HEX 
RESS. HEX 
RESS. HEX 
RESS. 
1572" 
DRES HE 
DRESS. HEX 
DRESS. HEX 
RESS. HEX 
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CROSS-REFERENCE LISTING 


REFERENCES 

LOCATION (00002392) 
LOCATION (00002394) 
LOCATION (00001FCA) 
LOCATION (00001FD0) 
LOCATION (00002930) 
LOCATION (00002904) 
LOCATION (00002920) 
LOCATION (00002934) 


EX LOCATION (00002972) 
1628 1630 


LOCATION (00002978) 
LOCATION (0000297C) 
LOCATION (000023B8) 
LOCATION (00002389) 
LOCATION (00002932) 
LOCATION (000023BA) 
LOCATION (000023BB) 
LOCATION (000023CC) 
1179 


531 
LOCATION (000023CE) 
532 4 


LOCATION (000023D0) 
LOCATION (00002998) 
LOCATION (0000299A) 
LOCATION (000029A8) 
LOCATION (00002876) 
LOCATION (0000239D) 
LOCATION (00002398) 
LOCATION (0000239F) 
LOCATION (00002340) 
LOCATION (000023A1) 
LOCATION (000023A2) 
LOCATION (000023A3) 
LOCATION (000023A4) 
LOCATION (00002396) 
LOCATION (00002398) 
LOCATION (00002399) 
LOCATION (0000239A) 
LOCATION (00002398) 
LOCATION (0000239C) 
LOCATION (00002872) 
LOCATION (00002874) 


EX LOCATION (000023D8) 
1552 
jaa 
LOCATION (00002304 
375 


Ee ORL EQN AOV0G EDS 2) 


52 521 
Poca ON eeo te 


X LOCATION (000023CA) 


LOCATION (00002364) 

LOCATION (00002384) 

LOCATION (00002388) 

LOCATION (00002454) 

LOCATION (0000245) 

X LOCATION (00002488) 
158 9 


“1573 


X LOCATION (00002489) 
LOCATION (0000248E) 
LOCATION (00002494) 
LOCATION (000024A0) 
LOCATION (000024A6) 


I 
28 


IN 
IN 
IN 
IN 
IN 
IN 
IN 
IN 
IN 
IN 
IN 
IN 
IN 
IN 
IN 
IN 
IN 
IN 
IN 
IN 
IN 
IN 
IN 
IN 
IN 
IN 
IN 
IN 
IN 
IN 
IN 
IN 
IN 
IN 
IN 
IN 
IN 
IN 
IN 
IN 
IN 


IN 
IN 
IN 
IN 
IN 
IN 
IN 
IN 
IN 
IN 
IN 
IN 
IN 
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OVERLAY P/N=8327421 
CROSS-REFERENCE LISTING 


EC=755404 PAGE O9A 


COPYRIGHT IBM CORP 1976 


DECLARED NAME ATTRIBUTES AND REFERENCES DECLARED NAME ATTRIBUTES AND REFERENCES 
163 CMD41 ADDRESS. HEX LOCATION (OOOO1E6E) IN CSECT(O38F4 ) LENGTH(17) 581 CSIO AD DREP OS HEX LOCATION (000022F6) IN CSECT(O38F4 ) LENGTH (2) 
173 CMD51 ADDRESS. HEX LOCATION (00001E88) IN CSECT(O38F4 ) LENGTH(17) 536 CSIO1 ADDRESS. HEX LOCATION (0000230A) IN CSECT(O38F4 ) LENGTH(4) 
313 CNEOO ADDRESS. HEX LOCATION (00002000) IN CSECT(O38F4 ) LENGTH (6) 608 CSIO3 ADDRESS. HEX, LOCATION (00002346) (IN CSECT(O38F4 ) LENGTH (4) 
322 CNEO1 ADDRESS. HEX LOCATION(00002010) IN CSECT(O38F4 ) LENGTH(6) 611 CSIO5 ADDRESS. HEX LOCATION (0000234C) IN CSECT(O38F4 ) LENGTH(4) 
336 CNEO3 ADDRESS. HEX LOCATION (00002036) IN CSECT(O38F4 ) LENGTH(1) 1158 CSRCH ADDRESS. HEX LOCATION (000024C0) IN CSECT(O38F4 ) LENGTH(1) 
358 CNEOS ADDRESS. HEX LOCATION(0000206C) IN CSECT(O38F4 ) LENGTH (6) 1031 CTABA ADDRESS, HEX LOCATION(000023EE) IN CSECT(O38F4 ) LENGTH(2) 
360 CNEO6 ADDRESS. HEX LOCATION (00002072) IN CSECT(O38F4 ) LENGTH(4) 1036 CTABN , BDBRESS. HEX LOCATION(000023F8) IN CSECT(O38F4 ) LENGTH(2) 
374 CNEQ7 ADDRESS. HEX LOCATION (00002098) IN CSECT(O38F4 ) LENGTH(4) | 1034 CTABP ADDRESS. HEX LOCATION (000023F4) IN CSECT(O38F4 ) LENGTH(2) 
408 CNE10 ADDRESS. HEX LOCATION (00002106) IN CSECT(O38F4 ) LENGTH(4) 1035 CTABS ADDRESS, HEX LOCATION (000023F6) IN CSECT(O38F4 ) LENGTH(2) 
419 CNE15 ADDRESS. HEX LOCATION (00002124) IN CSECT(O38F4 ) LENGTH(4) 1032 CTABU ADDRESS, HEX LOCATION(000023F0) IN CSECT(O38F4 ) LENGTH {2) 
432 CNE20 ADDRESS. HEX LOCATION (00002148) IN CSECT(O38F4 ) LENGTH(4) 1037 CTA1E ADDRESS» HEX LOCATION (000023FA) IN CSECT(O38F4Y ) LENGTH(2) 
456 CNE25 ADDRESS. HEX LOCATION (00002192) IN CSECT(O38F4  ) LENGTH (4) 976 cTCO1 ADDRESS. EX, LOCATION (000023A6) IN CSECT(O38F4  ) LENGTH (1) 
475 CNE27 ADDRESS. HEX LOCATION (000021C0O) IN CSECT(O38F4  ) LENGTH(4) S77 cTCc02 BDBE SS. HEX LOCATION (000023A7) IN CSECT(O38F4 ) LENGTH(1) 
513 CNE3A ADDRESS. HEX LOCATION (00002226) IN CSECT(O38F4 ) LENGTH(6) 978 cTCco03 ADDRESS. HEX LOCATION (000023A8) IN CSECT(O38F4  ) LENGTH(1) 
515 CNE3B ADDRESS. HEX LOCATION (0000222c) IN CSECT(O38F4 ) LENGTH(4) 979 CTCO4 /ADBRESS. HEX LOCATION (000023A9) IN CSECT(O38F4 ) LENGTH(1) 
490 CNE30 ADDRESS, HEX , LOCATION (00002 18a) IN CSECT (O38F4 oh LENGTH (4) 980 CTCO5 ADDRESS. HEX LOCATION(000023AA) IN CSECT(O38F4 ) LENGTH(1) 
520 CNE31 ADDRESS. HEX LOCATION (00002238) IN CSECT(038F4 L LENGTH (6) 981 CTC06 ADDRESS. HEX LOCATION(000023AB) IN CSECT(O38F4 ) LENGTH(1) 
372 393 406 &18 429 S54 461° 46300472 1312 
487 982 CTCO7 ADDRESS. HEX LOCATION (000023AC) IN CSECT(O38F4 ) LENGTH(1) 
529 CNE34 ADDRESS. HEX LOCATION (00002258) IN CSECT(O38F4 ) LENGTH(6) 1316 
564 1698 CTERM ADDRESS. HEX LOCATION (000029B2) IN CSECT(O38F4 ) LENGTH(2) 
561 CNE36 ADDRESS. HEX LOCATION (000022C6) IN CSECT(O38F4 ) LENGTH(6) 502 567 7 
536 539 544 1087 CTEO1 ADDRESS. HEX LOCATION (00002426) IN CSECT(O38F4 ) LENGTH(6) 
272 CNMAO ADDRESS. HEX LOCATION(OOOO1FAC) IN CSECT(O38F4 ) LENGTH (2) 152 
331 1088 CTEO2 ADDRESS. HEX LOCATION (0000242C) IN CSECT(O38F4 ) LENGTH (2) 
276 CNMA1 ADDRESS. HEX LOCATION(00001FB2) IN CSECT(O38F4 ) LENGTH(20) 1079 
272 1090 CTEO4 ADDRESS. HEX LOCATION (00002430) IN CSECT(O38F4 ) LENGTH (2) 
292 CNMA2 ADDRESS. HEX LOCATION(OOO0O1FEC) IN CSECT(O38F4 ) LENGTH (2) 1083 
643 12 16 CTICA ADDRESS. HEX LOCATION (00002538) IN CSECT(O38F4 ) LENGTH(1) 
296 CNMA3 ADDRESS. HEX LOCATION(OOOO1FF2) IN CSECT(O38F4Y ) LENGTH(13) 1328 1329 
292 1217 CTICC ADDRESS. HEX LOCATEON (00002539), IN CSECT(O38F4 ) LENGTH(1) 
241 CNMD1 ADDRESS. HEX LOCATION(00001F68) IN CSECT(O38F4 ) LENGTH (2) 1288 1293 1297 1303 1307 1312 1316 
552 1205 CTICcT ADDRESS. HEX LOCATION (00002528) IN CSECT(O38F4 ) LENGTH(2) 
246 CNMD2 ADDRESS. HEX LOCATION (O00001F6EF) IN CSECT(O38F4 ) LENGTH (2) 1278 1280 1281 
554 1215 CTIDA ADDRESS. HEX LOCATION (00002537) IN CSECT(O38F4 ) LENGTH(1) 
251 CNMD3 ADDRESS. HEX LOCATION(00001F74) IN CSECT(O38F4 ) LENGTH(2) 362 120 328 
556 1214 CTIDD ADDRESS. HEX LOCATION (00002536) IN CSECT(O38F4 ) LENGTH(1) 
257 CNMD4 ADDRESS. HEX LOCATION (OOO01F7C) IN CSECT(O38F4 ) LENGTH(2) 1244 161 
558 1220 CTIDF ADDRESS. HEX LOCATION(0000253C) IN CSECT(O38F4 ) LENGTH(2) 
261 CNMD5 ADDRESS. HEX LOCATION (00001F82) IN CSECT(O38F4  ) LENGTH (23) 1250 125 
257 1219 CTIID ADDRESS. HEX LOCATION (0000253A) IN CSECT(O38F4 ) LENGTH (2) 
262 CNMD6 ADDRESS. HEX LOCATION (00001F99) IN CSECT(O38F4 ) LENGTH(2) 142 374 =©390 6408 43 56 1251 1257 1616 
243 1204 CTIT2 ADDRESS. HEX LOCATION (00002526) IN CSECT(O38F4 ) LENGTH(2) 
264 CNMD7 ADDRESS. HEX LOCATION (OOO01FA2) IN CSECT(O38F4 ) LENGTH(2) 1259 1271 1274 1 
248 1207 cTIO4 ADDRESS. HEX LOCATION (0000252A) IN CSECT(O38F4 ) LENGTH(2) 
266 CNMD8 ADDRESS. HEX LOCATION(OOOO1FA7) IN CSECT(O38F4 ) LENGTH (2) 1254 1275 
253 1212 CTIO5 ADDRESS. HEX LOCATION (00002534) IN CSECT(O38F4 ) LENGTH (2) 
130 CNMOS ADDRESS. HEX LOCATION(00001E24) IN CSECT(O38F4 ) LENGTH (2) 1257 
404 44 1225 CTI1S ADDRESS. HEX LOCATION(00002540) IN CSECT(O38F4 ) LENGTH(2) 
134 CNMO6 ADDRESS. HEX LOCATION(00001E2A) IN CSECT(O38F4 ) LENGTH(17) 1330 
130 1229 CTI 16 ADDRESS. HEX LOCATION (00002546) IN CSECT(O38F4  ) LENGTH(20) 
135 CNMO7 ADDRESS. HEX LOCATION(00001E3B) IN CSECT(O38F4 ) LENGTH(6) 1225 
147 1230 CT1I17 ADDRESS. HEX LOCATION(0000255A) IN CSECT(O38F4 ) LENGTH(4) 
138 CNMO8 ADDRESS. HEX LOCATION(QOOOTE4F) IN CSECT(O38F4 ) LENGTH(4) 1245 
143 1232 CT1I18 ADDRESS. HEX LOCATION(00002564) IN CSECT(O38F4 ) LENGTH(2) 
152 CNM10 ADDRESS. HEX LOCATION(00001E62) IN CSECT(O38F4 ) LENGTH (2) 1287 1292 1296 1302 1306 1311 1315 
427. 452 485 1235 CTI20 ADDRESS. HEX LOCATION (00002568) IN CSECT(O38F4 ) LENGTH(2) 
141 CNM15 ADDRESS. HEX LOCATION (O0001E54) IN CSECT(O38F4 ) LENGTH (2) 1287 
402-44 1236 CT1I30 ADDRESS. HEX LOCATION(0000256A) IN CSECT(O38F4 ) LENGTH (2) 
145 CNM20 ADDRESS. HEX LOCATION(QOOO1E5A) IN CSECT{O38F4  ) LENGTH(2) 1292 
400 44 1237 CT1I35 ADDRESS. HEX LOCATION(0000256C) IN CSECT(O38F4 ) LENGTH (2) 
1077 CNM25 ADDRESS. HEX LOCATION(00002418) IN CSECT(O38F4 ) LENGTH(2) 1296 
422 447 480 1238 CTI4O ADDRESS. HEX LOCATION(0000256E) IN CSECT(O38F4 ) LENGTH(2) 
199 CNM6A ADDRESS. HEX LOCATION(OQOOO1EEC) IN CSECT(O38F4 ) LENGTH(2) 1302 
439 1239 CTI45 ADDRESS. HEX LOCATION (00002570) IN CSECT(O38F4 ) LENGTH(2) 
203 CNM6B ADDRESS. HEX LOCATION (OOO01EF2) IN CSECT(O38F4  ) LENGTH(17) 1306 
19 1240 CcTI50 ADDRESS. HEX LOCATION(00002572) IN CSECT(O38F4 ) LENGTH(2) 
179 CNM60 ADDRESS. HEX LOCATION(OOO01E9C) IN CSECT(O38F& ) LENGTH(2) 1311 
39 1241 cTI55 ADDRESS. HEX LOCATION (00002574) IN CSECT(O38F4 ) LENGTH (2) 
183 CNM61 ADDRESS. HEX LOCATION(OOOO1EA2) IN CSECT(O38F4 ) LENGTH (30) 1315 
179 1243 CTI60 ADDRESS. HEX LOCATION (00002576) IN CSECT(C38F4 ) LENGTH (2) 
189 CNM65 ADDRESS. HEX LOCATION (O0001EC4) IN CSECT(O38F4 ) LENGTH (2) 1325 
420 952 CTMSZ ADDRESS. HEX LOCATION (00002390) IN CSECT(O38F4 ) LENGTH (2) 
193 CNM66 ADDRESS. HEX LOCATION(OO001ECA) IN CSECT(O38F4 ) LENGTH(30) 337 339 | 
189 1081 CTM20 ADDRESS. HEX LOCATION(0000241E) IN CSECT(O38F4 ) LENGTH (2) 
209 CNM8O ADDRESS. HEX LOCATION(00001F06) IN CSECT(O38F4 ) LENGTH(2) 425 450 483 
478 1082 CTM21 ADDRESS. HEX LOCATION (00002420) IN CSECT(O38F4 ) LENGTH (2) 
213 CNM81 ADDRESS. HEX LOCATION(OO001FOC) IN CSECT(O38F4 ) LENGTH(28) 4244 8 
209 1021 CTRLS ADDRESS. HEX LOCATION(000023E0) IN CSECT(O38F4 ) LENGTH (2) 
218 CNM85 ADDRESS. HEX LOCATION(00001F2A) IN CSECT(O38F4 ) LENGTH(2) 1696 
347 1024 CTRL6 ADDRESS. HEX LOCATION(000023E6) IN CSECT(O38F4 ) LENGTH(S4) 
219 CNN86 | ADDRESS. HEX LOCATION(O00001F2C) IN CSECT(O38F4 ) LENGTH(2) 1021 
337 997 CTSA ADDRESS. HEX_LOCATION(000023BC) IN CSECT(O38F4 ) LENGTH(1) 
223 CNM87 ADDRESS. HEX LOCATION(00001F30) IN CSECT(O38F4 ) LENGTH(2) 375 53 562 
349 998 CTSA2 ADDRESS. HEX LOCATION (000023BD) IN CSECT(O38F4 ) LENGTH(1) 
224 CNM88 ADDRESS. HEX LOCATION(00001F32) IN CSECT(O38F4 ) LENGTH(2) 1165 
338 999 CTSEA ADDRESS. HEX LOCATION (000023BE) IN CSECT(O38F4 ) LENGTH (2) 
229 CNM90 ADDRESS. HEX LOCATION(00001F38) IN CSECT(O38F4 ) LENGTH(2) 416 424 432 449 459 2 11 
351 1001 CTSEE ADDRESS. HEX LOCATION (000023C1) IN CSECT(O38F4 ) LENGTH(1) 
233 CNM91 ADDRESS. HEX LOCATION(O0O001F3E) IN CSECT(O38F4 ) LENGTH(25) 252 538 1078 
229 1000 CTSEF ADDRESS. HEX LOCATION (000023CO) IN CSECT (O38F4 } LENGTH (1) 
234 CNM92 ADDRESS. HEX LOCATION(00001F57) IN CSECT(O38F4 ) LENGTH(4) 384 38 534° 535° 543 51 582 602 603 
220 623 63 638 1162 1168 1169 1171 
236 CNM93 ADDRESS. HEX LOCATION (00001F62) IN CSECT(O38F4 ) LENGTH(4) 52 CTSEM ADDRESS. HEX LOCATION(00001D7E) IN CSECT(O38F4 ) LENGTH (1) 
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CYI25 
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CYI4O 
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CyYI55 
CYI60 
CYI65 
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DNTAB 
DVTNA 
DVTUN 
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P/N=8327421 EC=755404 
CROSS-REFERENCE LISTING 
ATTRIBUTES AND REFERENCES 
ADDRESS. HEX LOCATION (000023C2) IN CSECT(O38F4 ) LENGTH(2) 
379 529 534 541 1161 
ADDRESS. HEX LOCATION (00001D7C) IN CSECT(O38F4 ) LENGTH(1) 
ADDRESS. HEX LOCATION (00001D7D) IN CSECT(O38F4  ) LENGTH(1) 
ADDRESS. HEX LOCATION (000023B4) IN CSECT(O38F4 ) LENGTH(2) 
ADDRESS. HEX LOCATION (00001D86) IN CSECT(O38F4  #) LENGTH(2) 
ADDRESS. HEX LOCATION (00001D8C) IN CSECT(O38F4  ) LENGTH(12) 
ADDRESS. HEX LOCATION(00001D9C) IN CSECT(O38F4  ) LENGTH(2) 
ADDRESS. HEX LOCATION(00001DA2) IN CSECT(O38F4 } LENGTH(12) 
ADDRESS. HEX LOCATION(00001DB2) IN CSECT(O38F4 =) LENGTH(2) 
ADDRESS. HEX LOCATION (00001DB8) IN CSECT(O38F4  ) LENGTH(19) 
ADDRESS. HEX LOCATEON(O0001DCE) IN CSECT(O38F4 ) LENGTH(2) 
ADDRESS. HEX LOCATION(00001DD4) IN CSECT(O38F4 } LENGTH(16) 
ADDRESS. HEX LOCATION (00001DE8) IN CSECT(O38F4  ) LENGTH(2) 
ADDRESS. HEX LOCATION(00001DF2) IN CSECT(O38F4  ) LENGTH(22) 
ADDRESS. HEX LOCATION (00001E0A) IN CSECT(O38F4  ) LENGTH(1) 
ADDRESS. HEX LOCATION(OO001EOE) IN CSECT(O38F4 ) LENGTH(2) 
ADDRESS. HEX LOCATION(00001E14) IN CSECT(O38F4 ) LENGTH(13) 
ABSOLUTE. HEX VALUE (0000000E) 
ADDRESS, HEX LOCATION (000022F2) IN CSECT(O38F4 ) LENGTH(4) 
ADDRESS. HEX LOCATION (000024D6) IN CSECT(O38F4 ) LENGTH(4) 
ADDRESS. HEX LOCATION(000024DC) IN CSECT(O38F4 ) LENGTH(4) 
1178 1183 1186 89 
{RDDRESS. HEX LOCATION (000024F2) IN CSECT(O38F4 ) LENGTH(4) 
 RDRRESS. HEX LOCATION (00002500) IN CSECT(O38F4 ) LENGTH(4) 
ADDRESS. HEX LOCATION (0000250E) IN CSECT(O38F4  ) LENGTH(6) 
ADDRESS. HEX LOCATION(0000251EF) IN CSECT(O38F4 ) LENGTH(4) 
ADDRESS. HEX LOCATION (00002580) IN CSECT(O38F4  ) LENGTH(6) 
jADBRESS. HEX LOCATION(000025AC) IN CSECT(O38F4 ) LENGTH(2) 
ADDRESS. HEX LOCATION (000025B6) IN CSECT(O38F4 ) LENGTH(6) 
ADDRESS. HEX LOCATION(000025D0) IN CSECT(O38F4  ) LENGTH(2) 
jDDDRESS. HEX LOCATION(000025E2) IN CSECT(O38F4  ) LENGTH(6) 
j ADDRESS. HEX LOCATION (000025F6) IN CSECT(O38F4 ) LENGTH(4) 
ADDRESS. HEX LOCATION (00002608) IN CSECT(O38F4& ) LENGTH(6) 
ADDRESS. HEX LOCATION (00002616) IN CSECT(O38F4 ) LENGTH(2) 
ADDRESS. HEX LOCATION(0000262A) IN CSECT(O38F4  ) LENGTH(6) 
ADDRESS. HEX LOCATION(00002638) IN CSECT(O38F4 ) LENGTH(4) 
ADDRESS. HEX LOCATION(0000264A) IN CSECT(O38F4  ) LENGTH(6) 
ADDR SS. HEX LOCATION (00002658), IN CSECT(O38F4  ) LENGTH(6) 
{AODRESS. HEX IOCATION(0000267E) IN CSECT(O38F4  ) LENGTH(6) 
ADDRESS, HEX, LOCATION (00002684) IN CSECT(O38F4 ) LENGTH(4) 
ADDRESS, HEX LOCATION (0000257C) IN CSECT(O38F4  ) LENGTH (2) 
ADDRESS. HEX LOCATION (00001D70) IN CSECT(O38F4  ) LENGTH(4) 
ADDRESS. HEX LOCATION(00002882) IN CSECT(O38F4  ) LENGTH(1) 
Abbenss. HEX LOCATION (000028A8) IN CSECT(O38F4 ) LENGTH(1) 
jADDRESS. HEX LOCATION (000028B0) IN CSECT(O38F4  ) LENGTH(1) 
jADBRESS. HEX LOCATION (000028D0) IN CSECT(O38F4  ) LENGTH(1) 
ADDRESS, HEX LOCATION (000028E0) IN CSECT(O38F4  ) LENGTH(1) 
ADDRESS. HEX LOCATION(00002688) IN CSECT(O38F4 ) LENGTH (2) 
jAQDRESS. HEX LOCATION (0000284A) IN CSECT(O38F4 ) LENGTH(2) 
ADDRESS. HEX LOCATION (0000286A) IN CSECT(O38F4  ) LENGTH(8) 
ABSOLUTE. HEX VALUE (00000008) 
1524 1543 1550 
Boo B30 she 391 387 8, nae ad? She 
570 
ABSOLUTE. HEX VALUE (0000000E) 
1513. 1515 
ABSOLUTE. HEX VALUE (00000004) 
ABSOLUTE. HEY ‘VALUE 4000091a) 
348 §=6©350 64010 = 403) 423° «4260 «64428 
451 481 484 553 555 557 1326 
ABSOLUTE. HEX VALUE (00000002) 
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1005 
47 
950 
747 
674 


675 
3 
1006 


682 
€83 
0 
0 


752 
1655 
1664 
1667 
1668 

53 

756 

681 

749 

748 

706 

746 


NAME 


IPLPS 
IPLSL 
OLYRA 
ONE 
OUT 


OUTIN 
O38F4 
PASS1 


RESET 
RID 
RO 

R1 


R2 


R3 
R4 
R5 


R6 


R7 


SIX 
STYPE 
STYP5 
STYP7 
SEYP9 
TCSBP 
TEN 
TERM 
THREE 
TWO 
WRITI 
ZERO 


ATTRIBUTES 


1279 
ADDRESS. 
313 51 
ADDRESS. 
313 
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